home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1997 #2 / Amiga Plus CD - 1997 - No. 02.iso / amigaplus_cd-rom_index / nr.2-95 < prev    next >
Text File  |  1978-06-11  |  1KB  |  37 lines
  1. IF NOT exists RAM:
  2.   Echo "Ohne die Ram-Disk *"RAM:*" funktioniert dieses Skript leider nicht!"
  3.   Echo "Auf jeder normalen Workbench sollte die RAM-Disk verfügbar sein."
  4.   Wait 5
  5.   Quit
  6. ENDIF
  7.  
  8. CD AmigaPlus_CD-ROM_Nr.2-97:AmigaPlus_CD-ROM_Index
  9. FailAt 240
  10. Stack 30000
  11. Set >NIL: Suchmuster ""
  12. Set Suchmuster `AmigaPlus_CD-ROM_Nr.2-97:AmigaPlus_CD-ROM_Index/ESR "" TITLEBAR "Amiga Plus CD-ROM Index" MESSAGE "Bitte Suchbegriff eingeben:"`
  13. IF "$Suchmuster" EQ ""
  14.   QUIT
  15. ENDIF
  16.  
  17. Echo >RAM:Plus-CD-Temp-1 "@DATABASE Such-Guide"
  18. Echo >>RAM:Plus-CD-Temp-1 "@REMARK Von Sandro Paolini für Amiga Plus CD Vol. 2/96"
  19. Echo >>RAM:Plus-CD-Temp-1 "@NODE MAIN *"Gefundene Einträge auf >>$Suchmuster<<*""
  20. Echo >>RAM:Plus-CD-Temp-1 ""
  21. Echo >>RAM:Plus-CD-Temp-1 " Nr.| Verzeichnis"
  22. Echo >>RAM:Plus-CD-Temp-1 "=================="
  23. AmigaPlus_CD-ROM_Nr.2-97:AmigaPlus_CD-ROM_Index/AGrep >RAM:Plus-CD-Temp-2 -i "$Suchmuster" Index_2
  24. Echo >>RAM:Plus-CD-Temp-2 "@ENDNODE"
  25. Join RAM:Plus-CD-Temp-1 RAM:Plus-CD-Temp-2 TO RAM:Plus-CD-Suche.guide
  26. Delete >NIL: RAM:Plus-CD-Temp-1 RAM:Plus-CD-Temp-2
  27. Copy >NIL: FROM #?Shell#? TO RAM:
  28. Protect RAM:Shellstart +s
  29. Protect RAM:ShellOpen +s
  30. Protect RAM:ShellCopy1 +s
  31. Protect RAM:ShellCopy2 +s
  32. Protect RAM:ShellDir1 +s
  33. Protect RAM:ShellDir2 +s
  34. AmigaPlus_CD-ROM_Nr.2-97:System/c/UseGuide RAM:Plus-CD-Suche.guide
  35. Delete >NIL: RAM:Shell#? RAM:Plus-CD-Suche.guide
  36. ENDCLI
  37.